## ── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
## ✔ dplyr     1.1.3     ✔ readr     2.1.4
## ✔ forcats   1.0.0     ✔ stringr   1.5.1
## ✔ ggplot2   3.4.4     ✔ tibble    3.2.1
## ✔ lubridate 1.9.3     ✔ tidyr     1.3.0
## ✔ purrr     1.0.2     
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## ✖ dplyr::filter() masks stats::filter()
## ✖ dplyr::lag()    masks stats::lag()
## ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
## Rows: 50 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## dbl (3): Year, Death_Rate, Deaths
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 5
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## dbl (3): Male_Ratio, Female_Ratio, Total_Ratio
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 3
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abbr
## num (1): Real_GDP_per_Capita
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
## Rows: 50 Columns: 3
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (2): State, abr
## num (1): Number_of_ Registered_Weapon
## 
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.

1.The distribution of gun violence in each state in US

2.The relationship between gender and gun violence

## 
## Attaching package: 'plotly'
## The following object is masked from 'package:ggplot2':
## 
##     last_plot
## The following object is masked from 'package:stats':
## 
##     filter
## The following object is masked from 'package:graphics':
## 
##     layout

3.The relationship between wealth and gun violence

## `geom_smooth()` using formula = 'y ~ x'

## `geom_smooth()` using formula = 'y ~ x'

4.The relationship between number of firearms and gun violence

## # A tibble: 50 × 7
##     Year State       abbr  Death_Rate Deaths abr   Number_of_ Registered_Weapo…¹
##    <dbl> <chr>       <chr>      <dbl>  <dbl> <chr>                         <dbl>
##  1  2021 Alabama     AL          26.4   1315 AL                           194920
##  2  2021 Alaska      AK          25.2    182 AL                            28237
##  3  2021 Arizona     AZ          18.3   1365 AZ                           258691
##  4  2021 Arkansas    AR          23.3    698 AR                           133981
##  5  2021 California  CA           9     3576 CA                           406360
##  6  2021 Colorado    CO          17.8   1064 CO                           149382
##  7  2021 Connecticut CT           6.7    248 CT                            74874
##  8  2021 Delaware    DE          16.6    158 DE                             6092
##  9  2021 Florida     FL          14.1   3142 FL                           518725
## 10  2021 Georgia     GA          20.3   2200 GA                           304124
## # ℹ 40 more rows
## # ℹ abbreviated name: ¹​`Number_of_ Registered_Weapon`

## `geom_smooth()` using formula = 'y ~ x'